home *** CD-ROM | disk | FTP | other *** search
/ Aminet 15 / Aminet 15 - Nov 1996.iso / Aminet / game / think / StepFive.lha / StepFiveV1.3 / Install.script < prev    next >
Text File  |  1996-01-20  |  3KB  |  116 lines
  1. (set programme "Step Five")
  2. (set progver "1.30")
  3.  
  4. ; English strings
  5.  
  6. (set #bad-kick (cat "\n"
  7. "You must have Kickstart 3.0 or higher installed to use Step Five \n")
  8. )
  9.  
  10. (set #install (cat "\n"
  11. "        " programme " installation      \n\n"
  12. "This script installs "programme" "progver"\n"
  13. "             on your Amiga.               \n"
  14. "" programme " © 1994 - 1996 NightLight Team\n\n"
  15. "          All rights reserved             \n")
  16. )
  17.  
  18. (set #where (cat "\n"
  19. "In wich drawer should " programme " be installed "
  20. "with this manual.\n"
  21. "A drawer called StepFive should be created.")
  22. )
  23.  
  24. (set #where-help (cat "\n"
  25. "A drawer called StepFive should be created.\n"
  26. "Principal files and datas should be copied in their own "
  27. "drawer with the manual of your language.")
  28. )
  29.  
  30. ; French strings
  31.  
  32. (if (= @language "Français")
  33. (
  34.  
  35. (set #bad-kick (cat "\n"
  36. "Vous devez posseder le Kickstart 3.0 ou supérieur pour utiliser " programme "!\n")
  37. )
  38.  
  39. (set #install (cat "\n"
  40. "       Installation de "programme"    \n\n"
  41. "Ce script installe "programme" "progver"\n"
  42. "         sur votre Amiga.               \n"
  43. ""programme" © 1994-1996 NightLight Team\n\n"
  44. "         Tous droits réservés.          ")
  45. )
  46.  
  47. (set #where (cat
  48. " S.V.P, sélectionnez le chemin d'accés ou installer "
  49. " "programme" avec sa documentation.\n"
  50. " Un tiroir appelé StepFive sera créé.")
  51. )
  52.  
  53. (set #where-help (cat "\n"
  54. "Un tiroir appelé "programme" va ètre crée.\n"
  55. "Le fichier principal et ses datas vont ètre copiés dans"
  56. "leurs tiroirs respectifs ainsi que la documentation "
  57. "suivant votre langague. "))
  58. ))
  59.  
  60. ;programme
  61.  
  62. (if (< (/ (getversion) 65536) 39)
  63.     (abort #bad-kick)
  64. )
  65.  
  66. (message #install)
  67.  
  68. (set destdir (askdir
  69.          (prompt (cat #where))
  70.          (help #where-help)
  71.              (default "sys:"))
  72. )
  73.  
  74. (set destdir (tackon destdir "StepFive"))
  75. (makedir destdir (infos))
  76. (copyfiles (source "stepfive")
  77.        (dest destdir)
  78. )
  79.  
  80. (if (exists "stepfive.hiscore")
  81.     (copyfiles (source "StepFive.hiscore")
  82.            (dest destdir)
  83.         )
  84. )
  85.  
  86. (if (exists "start")
  87.     (copyfiles (source "Start")
  88.            (dest destdir)
  89.            (infos)
  90.         )
  91. )
  92.  
  93. (set musiquesdir (tackon destdir "musiques"))
  94. (makedir musiquesdir (infos))
  95. (copyfiles (source "musiques/")
  96.        (dest musiquesdir)
  97.        (ALL)
  98. )
  99.  
  100. (if (= @language "english")
  101.    (set Sdocsdir "docs/english")
  102. )
  103.  
  104. (if (= @language "Français")
  105.    (set Sdocsdir "docs/Français")
  106. )
  107.  
  108. (set docsdir (tackon destdir "Docs"))
  109. (makedir Docsdir (infos))
  110. (copyfiles (source Sdocsdir)
  111.            (dest docsdir)
  112.            (all)
  113. )
  114.  
  115. (set @default-dest destdir)
  116. (EXIT)